home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Micro on the Apple Volume 2 (1981)(Micro Ink).zip / Micro on the Apple Volume 2 (1981)(Micro Ink).do / BATTLE SOUNDS.int < prev    next >
Text File  |  1996-12-24  |  894b  |  22 lines
  1. 1 REM  ************************
  2. 2 REM  *                      *
  3. 3 REM  *  STAR BATTLE SOUNDS  *
  4. 4 REM  *  WILLIAM SHYROCK,JR. *
  5. 5 REM  *                      *
  6. 6 REM  *      STAR BATTLE     *
  7. 7 REM  *                      *
  8. 8 REM  *  COPYRIGHT (C) 1981  *
  9. 9 REM  *    MICRO INK, INC.   *
  10. 10 REM  * CHELMSFORD, MA 01824 *
  11. 11 REM  *  ALL RIGHTS RESERVED *
  12. 12 REM  *                      *
  13. 13 REM  ************************
  14. 14  POKE 0,160: POKE 1,1: POKE 2,162: POKE 3,0: POKE 4,138: POKE 5,24: POKE 6,233: POKE 7,1: POKE 8,208: POKE 9,252: POKE 10,141
  15. 20  POKE 11,48: POKE 12,192: POKE 13,232: POKE 14,224: POKE 15,150: POKE 16,208: POKE 17,242: POKE 18,136: POKE 19,208: POKE 20,237: POKE 21,96
  16. 30 CALL -936:VTAB 12:TAB 9:PRINT "STAR BATTLE SOUND EFFECTS"
  17. 40 SHOTS= RND (15)+1
  18. 50 LENGTH= RND (11)*10+120
  19. 60  POKE 1,SHOTS: POKE 15,LENGTH:CALL 0
  20. 70 FOR DELAY=1 TO  RND (1000):NEXT DELAY
  21. 80 GOTO 40
  22.